home *** CD-ROM | disk | FTP | other *** search
/ Westlight Stock Photography - Creative Freedom / Westlight Stock Photography - Creative Freedom.iso / Place in System Folder / AppleScript™ / AppleScript™.rsrc / bin.rsrc_INIT_128_AppleScript Init.txt < prev    next >
Text File  |  1996-07-27  |  66KB  |  1,185 lines

  1. start:
  2. 00000000  4E56 FFFC                link       A6, -0x0004
  3. 00000004  48E7 0300                movem.l    -[A7], D6,D7
  4. 00000008  4EBA 007E                jsr        [PC + 0x7E /* 00000088 */]
  5. 0000000C  3C00                     move.w     D6, D0
  6. 0000000E  664C                     bne        +0x4E /* 0000005C */
  7. 00000010  4EBA 00AA                jsr        [PC + 0xAA /* 000000BC */]
  8. 00000014  3E00                     move.w     D7, D0
  9. 00000016  3C07                     move.w     D6, D7
  10. 00000018  4EBA 00E6                jsr        [PC + 0xE6 /* 00000100 */]
  11. 0000001C  3E00                     move.w     D7, D0
  12. 0000001E  4A47                     tst.w      D7
  13. 00000020  6702                     beq        +0x4 /* 00000024 */
  14. 00000022  3C07                     move.w     D6, D7
  15. label00000024:
  16. 00000024  4EBA 02EE                jsr        [PC + 0x2EE /* 00000314 */]
  17. 00000028  4A00                     tst.b      D0
  18. 0000002A  6702                     beq        +0x4 /* 0000002E */
  19. 0000002C  7CFF                     moveq.l    D6, 0xFFFFFFFF
  20. label0000002E:
  21. 0000002E  4A46                     tst.w      D6
  22. 00000030  662A                     bne        +0x2C /* 0000005C */
  23. 00000032  486E FFFC                pea.l      [A6 - 0x4]
  24. 00000036  4EBA 0138                jsr        [PC + 0x138 /* 00000170 */]
  25. 0000003A  3E00                     move.w     D7, D0
  26. 0000003C  584F                     addq.w     A7, 4
  27. 0000003E  8C47                     or.w       D6, D7
  28. 00000040  486E FFFC                pea.l      [A6 - 0x4]
  29. 00000044  4EBA 0320                jsr        [PC + 0x320 /* 00000366 */]
  30. 00000048  3E00                     move.w     D7, D0
  31. 0000004A  584F                     addq.w     A7, 4
  32. 0000004C  8C47                     or.w       D6, D7
  33. 0000004E  486E FFFC                pea.l      [A6 - 0x4]
  34. 00000052  4EBA 0164                jsr        [PC + 0x164 /* 000001B8 */]
  35. 00000056  3E00                     move.w     D7, D0
  36. 00000058  584F                     addq.w     A7, 4
  37. 0000005A  8C47                     or.w       D6, D7
  38. label0000005C:
  39. 0000005C  4A46                     tst.w      D6
  40. 0000005E  670E                     beq        +0x10 /* 0000006E */
  41. 00000060  7055                     moveq.l    D0, 0x55
  42. 00000062  3F00                     move.w     -[A7], D0
  43. 00000064  72FF                     moveq.l    D1, 0xFFFFFFFF
  44. 00000066  3F01                     move.w     -[A7], D1
  45. 00000068  4EBA 0A06                jsr        [PC + 0xA06 /* 00000A70 */]
  46. 0000006C  6010                     bra        +0x12 /* 0000007E */
  47. label0000006E:
  48. 0000006E  3F3C 0082                move.w     -[A7], 0x82
  49. 00000072  70FF                     moveq.l    D0, 0xFFFFFFFF
  50. 00000074  3F00                     move.w     -[A7], D0
  51. 00000076  4EBA 09F8                jsr        [PC + 0x9F8 /* 00000A70 */]
  52. 0000007A  4EBA 024E                jsr        [PC + 0x24E /* 000002CA */]
  53. label0000007E:
  54. 0000007E  4CEE 00C0 FFF4           movem.l    D6,D7, [A6 - 0xC]
  55. 00000084  4E5E                     unlink     A6
  56. 00000086  4E75                     rts
  57. fn00000088:
  58. 00000088  4E56 FFF0                link       A6, -0x0010
  59. 0000008C  48E7 0300                movem.l    -[A7], D6,D7
  60. 00000090  7EFF                     moveq.l    D7, 0xFFFFFFFF
  61. 00000092  558F                     subq.l     A7, 2
  62. 00000094  7001                     moveq.l    D0, 0x01
  63. 00000096  3F00                     move.w     -[A7], D0
  64. 00000098  486E FFF0                pea.l      [A6 - 0x10]
  65. 0000009C  4EBA 0622                jsr        [PC + 0x622 /* 000006C0 */]
  66. 000000A0  3C1F                     move.w     D6, [A7]+
  67. 000000A2  6704                     beq        +0x6 /* 000000A8 */
  68. 000000A4  3006                     move.w     D0, D6
  69. 000000A6  600A                     bra        +0xC /* 000000B2 */
  70. label000000A8:
  71. 000000A8  4A6E FFF2                tst.w      [A6 - 0xE]
  72. 000000AC  6D02                     blt        +0x4 /* 000000B0 */
  73. 000000AE  4247                     clr.w      D7
  74. label000000B0:
  75. 000000B0  3007                     move.w     D0, D7
  76. label000000B2:
  77. 000000B2  4CEE 00C0 FFE8           movem.l    D6,D7, [A6 - 0x18]
  78. 000000B8  4E5E                     unlink     A6
  79. 000000BA  4E75                     rts
  80. fn000000BC:
  81. 000000BC  4E56 FFFC                link       A6, -0x0004
  82. 000000C0  48E7 0118                movem.l    -[A7], D7,A3,A4
  83. 000000C4  7EFF                     moveq.l    D7, 0xFFFFFFFF
  84. 000000C6  598F                     subq.l     A7, 4
  85. 000000C8  2F3C 696E 6974           move.l     -[A7], 0x696E6974 /* 'init' */
  86. 000000CE  3F3C BF20                move.w     -[A7], 0xBF20
  87. 000000D2  A81F                     syscall    Get1Resource
  88. 000000D4  285F                     movea.l    A4, [A7]+
  89. 000000D6  200C                     move.l     D0, A4
  90. 000000D8  6704                     beq        +0x6 /* 000000DE */
  91. 000000DA  2654                     movea.l    A3, [A4]
  92. 000000DC  4E93                     jsr        [A3]
  93. label000000DE:
  94. 000000DE  558F                     subq.l     A7, 2
  95. 000000E0  2F3C 6370 6E74           move.l     -[A7], 0x63706E74 /* 'cpnt' */
  96. 000000E6  486E FFFC                pea.l      [A6 - 0x4]
  97. 000000EA  4EBA 0776                jsr        [PC + 0x776 /* 00000862 */]
  98. 000000EE  4A5F                     tst.w      [A7]+
  99. 000000F0  6602                     bne        +0x4 /* 000000F4 */
  100. 000000F2  4247                     clr.w      D7
  101. label000000F4:
  102. 000000F4  3007                     move.w     D0, D7
  103. 000000F6  4CEE 1880 FFF0           movem.l    D7,A3,A4, [A6 - 0x10]
  104. 000000FC  4E5E                     unlink     A6
  105. 000000FE  4E75                     rts
  106. fn00000100:
  107. 00000100  4E56 FFFC                link       A6, -0x0004
  108. 00000104  48E7 0118                movem.l    -[A7], D7,A3,A4
  109. 00000108  7EFF                     moveq.l    D7, 0xFFFFFFFF
  110. 0000010A  558F                     subq.l     A7, 2
  111. 0000010C  2F3C 6576 6E74           move.l     -[A7], 0x65766E74 /* 'evnt' */
  112. 00000112  486E FFFC                pea.l      [A6 - 0x4]
  113. 00000116  4EBA 074A                jsr        [PC + 0x74A /* 00000862 */]
  114. 0000011A  4A5F                     tst.w      [A7]+
  115. 0000011C  660C                     bne        +0xE /* 0000012A */
  116. 0000011E  7002                     moveq.l    D0, 0x02
  117. 00000120  C0AE FFFC                and.l      D0, [A6 - 0x4]
  118. 00000124  6704                     beq        +0x6 /* 0000012A */
  119. 00000126  7000                     moveq.l    D0, 0x00
  120. 00000128  603C                     bra        +0x3E /* 00000166 */
  121. label0000012A:
  122. 0000012A  598F                     subq.l     A7, 4
  123. 0000012C  2F3C 696E 6974           move.l     -[A7], 0x696E6974 /* 'init' */
  124. 00000132  7001                     moveq.l    D0, 0x01
  125. 00000134  3F00                     move.w     -[A7], D0
  126. 00000136  A81F                     syscall    Get1Resource
  127. 00000138  285F                     movea.l    A4, [A7]+
  128. 0000013A  200C                     move.l     D0, A4
  129. 0000013C  6704                     beq        +0x6 /* 00000142 */
  130. 0000013E  2654                     movea.l    A3, [A4]
  131. 00000140  4E93                     jsr        [A3]
  132. label00000142:
  133. 00000142  558F                     subq.l     A7, 2
  134. 00000144  2F3C 6576 6E74           move.l     -[A7], 0x65766E74 /* 'evnt' */
  135. 0000014A  486E FFFC                pea.l      [A6 - 0x4]
  136. 0000014E  4EBA 0712                jsr        [PC + 0x712 /* 00000862 */]
  137. 00000152  4A5F                     tst.w      [A7]+
  138. 00000154  660E                     bne        +0x10 /* 00000164 */
  139. 00000156  7001                     moveq.l    D0, 0x01
  140. 00000158  C0AE FFFC                and.l      D0, [A6 - 0x4]
  141. 0000015C  6706                     beq        +0x8 /* 00000164 */
  142. 0000015E  4EBA 03FC                jsr        [PC + 0x3FC /* 0000055C */]
  143. 00000162  4247                     clr.w      D7
  144. label00000164:
  145. 00000164  3007                     move.w     D0, D7
  146. label00000166:
  147. 00000166  4CEE 1880 FFF0           movem.l    D7,A3,A4, [A6 - 0x10]
  148. 0000016C  4E5E                     unlink     A6
  149. 0000016E  4E75                     rts
  150. fn00000170:
  151. 00000170  4E56 0000                link       A6, 0
  152. 00000174  48E7 0118                movem.l    -[A7], D7,A3,A4
  153. 00000178  266E 0008                movea.l    A3, [A6 + 0x8]
  154. 0000017C  598F                     subq.l     A7, 4
  155. 0000017E  2F3C 7468 6E67           move.l     -[A7], 0x74686E67 /* 'thng' */
  156. 00000184  3F3C 0080                move.w     -[A7], 0x80
  157. 00000188  A81F                     syscall    Get1Resource
  158. 0000018A  285F                     movea.l    A4, [A7]+
  159. 0000018C  558F                     subq.l     A7, 2
  160. 0000018E  A9AF                     syscall    ResError
  161. 00000190  3E1F                     move.w     D7, [A7]+
  162. 00000192  6614                     bne        +0x16 /* 000001A8 */
  163. 00000194  200C                     move.l     D0, A4
  164. 00000196  6710                     beq        +0x12 /* 000001A8 */
  165. 00000198  598F                     subq.l     A7, 4
  166. 0000019A  7000                     moveq.l    D0, 0x00
  167. 0000019C  2F00                     move.l     -[A7], D0
  168. 0000019E  2F14                     move.l     -[A7], [A4]
  169. 000001A0  7004                     moveq.l    D0, 0x04
  170. 000001A2  A82A                     syscall    ComponentDispatch
  171. 000001A4  269F                     move.l     [A3], [A7]+
  172. 000001A6  6004                     bra        +0x6 /* 000001AC */
  173. label000001A8:
  174. 000001A8  7000                     moveq.l    D0, 0x00
  175. 000001AA  2680                     move.l     [A3], D0
  176. label000001AC:
  177. 000001AC  3007                     move.w     D0, D7
  178. 000001AE  4CEE 1880 FFF4           movem.l    D7,A3,A4, [A6 - 0xC]
  179. 000001B4  4E5E                     unlink     A6
  180. 000001B6  4E75                     rts
  181. fn000001B8:
  182. 000001B8  4E56 FEF0                link       A6, -0x0110
  183. 000001BC  48E7 1F38                movem.l    -[A7], D3,D4,D5,D6,D7,A2,A3,A4
  184. 000001C0  246E 0008                movea.l    A2, [A6 + 0x8]
  185. 000001C4  49EE FEFE                lea.l      A4, [A6 - 0x102]
  186. 000001C8  4246                     clr.w      D6
  187. 000001CA  7000                     moveq.l    D0, 0x00
  188. 000001CC  2640                     movea.l    A3, D0
  189. 000001CE  558F                     subq.l     A7, 2
  190. 000001D0  2F3C 6173 6869           move.l     -[A7], 0x61736869 /* 'ashi' */
  191. 000001D6  A80D                     syscall    Count1Resources
  192. 000001D8  3D5F FFFE                move.w     [A6 - 0x2], [A7]+
  193. 000001DC  7C01                     moveq.l    D6, 0x01
  194. 000001DE  6000 00CC                bra        +0xCE /* 000002AC */
  195. label000001E2:
  196. 000001E2  598F                     subq.l     A7, 4
  197. 000001E4  2F3C 6173 6869           move.l     -[A7], 0x61736869 /* 'ashi' */
  198. 000001EA  3F06                     move.w     -[A7], D6
  199. 000001EC  A80E                     syscall    Get1IndResource/Get1IxResource
  200. 000001EE  265F                     movea.l    A3, [A7]+
  201. 000001F0  558F                     subq.l     A7, 2
  202. 000001F2  A9AF                     syscall    ResError
  203. 000001F4  3A1F                     move.w     D5, [A7]+
  204. 000001F6  6706                     beq        +0x8 /* 000001FE */
  205. 000001F8  3005                     move.w     D0, D5
  206. 000001FA  6000 00C4                bra        +0xC6 /* 000002C0 */
  207. label000001FE:
  208. 000001FE  200B                     move.l     D0, A3
  209. 00000200  6700 00A6                beq        +0xA8 /* 000002A8 */
  210. 00000204  2F0B                     move.l     -[A7], A3
  211. 00000206  486E FEF8                pea.l      [A6 - 0x108]
  212. 0000020A  486E FEFA                pea.l      [A6 - 0x106]
  213. 0000020E  2F0C                     move.l     -[A7], A4
  214. 00000210  A9A8                     syscall    GetResInfo
  215. 00000212  558F                     subq.l     A7, 2
  216. 00000214  A9AF                     syscall    ResError
  217. 00000216  381F                     move.w     D4, [A7]+
  218. 00000218  6706                     beq        +0x8 /* 00000220 */
  219. 0000021A  3004                     move.w     D0, D4
  220. 0000021C  6000 00A2                bra        +0xA4 /* 000002C0 */
  221. label00000220:
  222. 00000220  7000                     moveq.l    D0, 0x00
  223. 00000222  1014                     move.b     D0, [A4]
  224. 00000224  0C40 0008                cmpi.w     D0, 0x8
  225. 00000228  667A                     bne        +0x7C /* 000002A4 */
  226. 0000022A  2E0C                     move.l     D7, A4
  227. 0000022C  5287                     addq.l     D7, 1
  228. 0000022E  2047                     movea.l    A0, D7
  229. 00000230  7000                     moveq.l    D0, 0x00
  230. 00000232  1010                     move.b     D0, [A0]
  231. 00000234  E188                     lsl        D0, 8
  232. 00000236  2047                     movea.l    A0, D7
  233. 00000238  7200                     moveq.l    D1, 0x00
  234. 0000023A  1228 0001                move.b     D1, [A0 + 0x1]
  235. 0000023E  8280                     or.l       D1, D0
  236. 00000240  E189                     lsl        D1, 8
  237. 00000242  2047                     movea.l    A0, D7
  238. 00000244  7000                     moveq.l    D0, 0x00
  239. 00000246  1028 0002                move.b     D0, [A0 + 0x2]
  240. 0000024A  8081                     or.l       D0, D1
  241. 0000024C  E188                     lsl        D0, 8
  242. 0000024E  2047                     movea.l    A0, D7
  243. 00000250  7200                     moveq.l    D1, 0x00
  244. 00000252  1228 0003                move.b     D1, [A0 + 0x3]
  245. 00000256  8280                     or.l       D1, D0
  246. 00000258  2D41 FEF0                move.l     [A6 - 0x110], D1
  247. 0000025C  2E0C                     move.l     D7, A4
  248. 0000025E  5A87                     addq.l     D7, 5
  249. 00000260  2047                     movea.l    A0, D7
  250. 00000262  7000                     moveq.l    D0, 0x00
  251. 00000264  1010                     move.b     D0, [A0]
  252. 00000266  E188                     lsl        D0, 8
  253. 00000268  2047                     movea.l    A0, D7
  254. 0000026A  7200                     moveq.l    D1, 0x00
  255. 0000026C  1228 0001                move.b     D1, [A0 + 0x1]
  256. 00000270  8280                     or.l       D1, D0
  257. 00000272  E189                     lsl        D1, 8
  258. 00000274  2047                     movea.l    A0, D7
  259. 00000276  7000                     moveq.l    D0, 0x00
  260. 00000278  1028 0002                move.b     D0, [A0 + 0x2]
  261. 0000027C  8081                     or.l       D0, D1
  262. 0000027E  E188                     lsl        D0, 8
  263. 00000280  2047                     movea.l    A0, D7
  264. 00000282  7200                     moveq.l    D1, 0x00
  265. 00000284  1228 0003                move.b     D1, [A0 + 0x3]
  266. 00000288  2601                     move.l     D3, D1
  267. 0000028A  8680                     or.l       D3, D0
  268. 0000028C  558F                     subq.l     A7, 2
  269. 0000028E  2F2E FEF0                move.l     -[A7], [A6 - 0x110]
  270. 00000292  2F03                     move.l     -[A7], D3
  271. 00000294  2F13                     move.l     -[A7], [A3]
  272. 00000296  2F12                     move.l     -[A7], [A2]
  273. 00000298  7001                     moveq.l    D0, 0x01
  274. 0000029A  1F00                     move.b     -[A7], D0
  275. 0000029C  303C 091F                move.w     D0, 0x91F
  276. 000002A0  A816                     syscall    Pack8
  277. 000002A2  544F                     addq.w     A7, 2
  278. label000002A4:
  279. 000002A4  2F0B                     move.l     -[A7], A3
  280. 000002A6  A992                     syscall    DetachResource
  281. label000002A8:
  282. 000002A8  3006                     move.w     D0, D6
  283. 000002AA  5246                     addq.w     D6, 1
  284. label000002AC:
  285. 000002AC  BC6E FFFE                cmp.w      D6, [A6 - 0x2]
  286. 000002B0  6F00 FF30                ble        -0xCE /* 000001E2 */
  287. 000002B4  700A                     moveq.l    D0, 0x0A
  288. 000002B6  2F00                     move.l     -[A7], D0
  289. 000002B8  2F0A                     move.l     -[A7], A2
  290. 000002BA  4EBA 032E                jsr        [PC + 0x32E /* 000005EA */]
  291. 000002BE  504F                     addq.w     A7, 8
  292. label000002C0:
  293. 000002C0  4CEE 1CF8 FED0           movem.l    D3,D4,D5,D6,D7,A2,A3,A4, [A6 - 0x130]
  294. 000002C6  4E5E                     unlink     A6
  295. 000002C8  4E75                     rts
  296. fn000002CA:
  297. 000002CA  4E56 0000                link       A6, 0
  298. 000002CE  48E7 0108                movem.l    -[A7], D7,A4
  299. 000002D2  598F                     subq.l     A7, 4
  300. 000002D4  2F3C 7072 6F63           move.l     -[A7], 0x70726F63 /* 'proc' */
  301. 000002DA  7000                     moveq.l    D0, 0x00
  302. 000002DC  3F00                     move.w     -[A7], D0
  303. 000002DE  A81F                     syscall    Get1Resource
  304. 000002E0  285F                     movea.l    A4, [A7]+
  305. 000002E2  200C                     move.l     D0, A4
  306. 000002E4  6724                     beq        +0x26 /* 0000030A */
  307. 000002E6  2F0C                     move.l     -[A7], A4
  308. 000002E8  A992                     syscall    DetachResource
  309. 000002EA  558F                     subq.l     A7, 2
  310. 000002EC  2F3C 6173 6372           move.l     -[A7], 0x61736372 /* 'ascr' */
  311. 000002F2  2F14                     move.l     -[A7], [A4]
  312. 000002F4  4EBA 0534                jsr        [PC + 0x534 /* 0000082A */]
  313. 000002F8  3E1F                     move.w     D7, [A7]+
  314. 000002FA  558F                     subq.l     A7, 2
  315. 000002FC  2F3C 6173 6376           move.l     -[A7], 0x61736376 /* 'ascv' */
  316. 00000302  2F14                     move.l     -[A7], [A4]
  317. 00000304  4EBA 0524                jsr        [PC + 0x524 /* 0000082A */]
  318. 00000308  3E1F                     move.w     D7, [A7]+
  319. label0000030A:
  320. 0000030A  4CEE 1080 FFF8           movem.l    D7,A4, [A6 - 0x8]
  321. 00000310  4E5E                     unlink     A6
  322. 00000312  4E75                     rts
  323. fn00000314:
  324. 00000314  4E56 FFFC                link       A6, -0x0004
  325. 00000318  558F                     subq.l     A7, 2
  326. 0000031A  2F3C 6173 6376           move.l     -[A7], 0x61736376 /* 'ascv' */
  327. 00000320  486E FFFC                pea.l      [A6 - 0x4]
  328. 00000324  4EBA 053C                jsr        [PC + 0x53C /* 00000862 */]
  329. 00000328  4A5F                     tst.w      [A7]+
  330. 0000032A  660E                     bne        +0x10 /* 0000033A */
  331. 0000032C  0CAE 0110 0110 FFFC      cmpi.l     [A6 - 0x4], 0x1100110
  332. 00000334  6D04                     blt        +0x6 /* 0000033A */
  333. 00000336  7001                     moveq.l    D0, 0x01
  334. 00000338  6002                     bra        +0x4 /* 0000033C */
  335. label0000033A:
  336. 0000033A  7000                     moveq.l    D0, 0x00
  337. label0000033C:
  338. 0000033C  4E5E                     unlink     A6
  339. 0000033E  4E75                     rts
  340. fn00000340:
  341. 00000340  4E56 0000                link       A6, 0
  342. 00000344  558F                     subq.l     A7, 2
  343. 00000346  2F3C 6173 6372           move.l     -[A7], 0x61736372 /* 'ascr' */
  344. 0000034C  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  345. 00000350  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  346. 00000354  7000                     moveq.l    D0, 0x00
  347. 00000356  2F00                     move.l     -[A7], D0
  348. 00000358  7201                     moveq.l    D1, 0x01
  349. 0000035A  1F01                     move.b     -[A7], D1
  350. 0000035C  303C 091F                move.w     D0, 0x91F
  351. 00000360  A816                     syscall    Pack8
  352. 00000362  4E5E                     unlink     A6
  353. 00000364  4E75                     rts
  354. fn00000366:
  355. 00000366  4E56 FFF4                link       A6, -0x000C
  356. 0000036A  48E7 0338                movem.l    -[A7], D6,D7,A2,A3,A4
  357. 0000036E  7000                     moveq.l    D0, 0x00
  358. 00000370  2840                     movea.l    A4, D0
  359. 00000372  2640                     movea.l    A3, D0
  360. 00000374  702E                     moveq.l    D0, 0x2E
  361. 00000376  A71E                     syscall    NewPtrSysClear, flags=7
  362. 00000378  2848                     movea.l    A4, A0
  363. 0000037A  3C38 0220                move.w     D6, [0x00000220 /* MemErr */]
  364. 0000037E  200C                     move.l     D0, A4
  365. 00000380  6700 0192                beq        +0x194 /* 00000514 */
  366. 00000384  4A46                     tst.w      D6
  367. 00000386  6600 018C                bne        +0x18E /* 00000514 */
  368. 0000038A  206E 0008                movea.l    A0, [A6 + 0x8]
  369. 0000038E  2950 000A                move.l     [A4 + 0xA], [A0]
  370. 00000392  206E 0008                movea.l    A0, [A6 + 0x8]
  371. 00000396  2950 000E                move.l     [A4 + 0xE], [A0]
  372. 0000039A  598F                     subq.l     A7, 4
  373. 0000039C  2F3C 7072 6F63           move.l     -[A7], 0x70726F63 /* 'proc' */
  374. 000003A2  7001                     moveq.l    D0, 0x01
  375. 000003A4  3F00                     move.w     -[A7], D0
  376. 000003A6  A81F                     syscall    Get1Resource
  377. 000003A8  2D5F FFF4                move.l     [A6 - 0xC], [A7]+
  378. 000003AC  6770                     beq        +0x72 /* 0000041E */
  379. 000003AE  2F2E FFF4                move.l     -[A7], [A6 - 0xC]
  380. 000003B2  A992                     syscall    DetachResource
  381. 000003B4  206E FFF4                movea.l    A0, [A6 - 0xC]
  382. 000003B8  2450                     movea.l    A2, [A0]
  383. 000003BA  7E00                     moveq.l    D7, 0x00
  384. label000003BC:
  385. 000003BC  558F                     subq.l     A7, 2
  386. 000003BE  2F07                     move.l     -[A7], D7
  387. 000003C0  486E FFFC                pea.l      [A6 - 0x4]
  388. 000003C4  4E92                     jsr        [A2]
  389. 000003C6  3C1F                     move.w     D6, [A7]+
  390. 000003C8  664A                     bne        +0x4C /* 00000414 */
  391. 000003CA  4AAE FFFC                tst.l      [A6 - 0x4]
  392. 000003CE  6744                     beq        +0x46 /* 00000414 */
  393. 000003D0  2007                     move.l     D0, D7
  394. 000003D2  6B40                     bmi        +0x42 /* 00000414 */
  395. 000003D4  0C80 0000 0004           cmpi.l     D0, 0x4
  396. 000003DA  6E38                     bgt        +0x3A /* 00000414 */
  397. 000003DC  D080                     add.l      D0, D0
  398. 000003DE  303B 0806                move.w     D0, [PC + D0 + 0x6]
  399. 000003E2  4EFB 0000                jmp        [PC + D0.w]
  400. 000003E6  000C 0014                ori.b      A4, 0x14
  401. 000003EA  001C 0024                ori.b      [A4]+, 0x24 /* '$' */
  402. 000003EE  002C 296E FFFC           ori.b      [A4 - 0x4], 0x6E /* 'n' */
  403. 000003F4  001E 601C                ori.b      [A6]+, 0x1C
  404. 000003F8  296E FFFC 0022           move.l     [A4 + 0x22], [A6 - 0x4]
  405. 000003FE  6014                     bra        +0x16 /* 00000414 */
  406. 00000400  296E FFFC 0026           move.l     [A4 + 0x26], [A6 - 0x4]
  407. 00000406  600C                     bra        +0xE /* 00000414 */
  408. 00000408  296E FFFC 002A           move.l     [A4 + 0x2A], [A6 - 0x4]
  409. 0000040E  6004                     bra        +0x6 /* 00000414 */
  410. 00000410  266E FFFC                movea.l    A3, [A6 - 0x4]
  411. label00000414:
  412. 00000414  2007                     move.l     D0, D7
  413. 00000416  5287                     addq.l     D7, 1
  414. 00000418  7005                     moveq.l    D0, 0x05
  415. 0000041A  B087                     cmp.l      D0, D7
  416. 0000041C  6E9E                     bgt        -0x60 /* 000003BC */
  417. label0000041E:
  418. 0000041E  4AAC 001E                tst.l      [A4 + 0x1E]
  419. 00000422  6700 00F0                beq        +0xF2 /* 00000514 */
  420. 00000426  558F                     subq.l     A7, 2
  421. 00000428  7004                     moveq.l    D0, 0x04
  422. 0000042A  2F00                     move.l     -[A7], D0
  423. 0000042C  7208                     moveq.l    D1, 0x08
  424. 0000042E  3F01                     move.w     -[A7], D1
  425. 00000430  700C                     moveq.l    D0, 0x0C
  426. 00000432  3F00                     move.w     -[A7], D0
  427. 00000434  7000                     moveq.l    D0, 0x00
  428. 00000436  2F00                     move.l     -[A7], D0
  429. 00000438  7001                     moveq.l    D0, 0x01
  430. 0000043A  1F00                     move.b     -[A7], D0
  431. 0000043C  486C 0012                pea.l      [A4 + 0x12]
  432. 00000440  303C 092E                move.w     D0, 0x92E /* '\t.' */
  433. 00000444  A816                     syscall    Pack8
  434. 00000446  3C1F                     move.w     D6, [A7]+
  435. 00000448  558F                     subq.l     A7, 2
  436. 0000044A  7004                     moveq.l    D0, 0x04
  437. 0000044C  2F00                     move.l     -[A7], D0
  438. 0000044E  7208                     moveq.l    D1, 0x08
  439. 00000450  3F01                     move.w     -[A7], D1
  440. 00000452  700C                     moveq.l    D0, 0x0C
  441. 00000454  3F00                     move.w     -[A7], D0
  442. 00000456  7000                     moveq.l    D0, 0x00
  443. 00000458  2F00                     move.l     -[A7], D0
  444. 0000045A  7001                     moveq.l    D0, 0x01
  445. 0000045C  1F00                     move.b     -[A7], D0
  446. 0000045E  486C 0016                pea.l      [A4 + 0x16]
  447. 00000462  303C 092E                move.w     D0, 0x92E /* '\t.' */
  448. 00000466  A816                     syscall    Pack8
  449. 00000468  3C1F                     move.w     D6, [A7]+
  450. 0000046A  558F                     subq.l     A7, 2
  451. 0000046C  7004                     moveq.l    D0, 0x04
  452. 0000046E  2F00                     move.l     -[A7], D0
  453. 00000470  7208                     moveq.l    D1, 0x08
  454. 00000472  3F01                     move.w     -[A7], D1
  455. 00000474  700C                     moveq.l    D0, 0x0C
  456. 00000476  3F00                     move.w     -[A7], D0
  457. 00000478  7000                     moveq.l    D0, 0x00
  458. 0000047A  2F00                     move.l     -[A7], D0
  459. 0000047C  7001                     moveq.l    D0, 0x01
  460. 0000047E  1F00                     move.b     -[A7], D0
  461. 00000480  486C 001A                pea.l      [A4 + 0x1A]
  462. 00000484  303C 092E                move.w     D0, 0x92E /* '\t.' */
  463. 00000488  A816                     syscall    Pack8
  464. 0000048A  3C1F                     move.w     D6, [A7]+
  465. 0000048C  558F                     subq.l     A7, 2
  466. 0000048E  2F3C 7470 6874           move.l     -[A7], 0x74706874 /* 'tpht' */
  467. 00000494  2F3C 6C6F 6164           move.l     -[A7], 0x6C6F6164 /* 'load' */
  468. 0000049A  2F2C 001E                move.l     -[A7], [A4 + 0x1E]
  469. 0000049E  2F0C                     move.l     -[A7], A4
  470. 000004A0  7001                     moveq.l    D0, 0x01
  471. 000004A2  1F00                     move.b     -[A7], D0
  472. 000004A4  303C 091F                move.w     D0, 0x91F
  473. 000004A8  A816                     syscall    Pack8
  474. 000004AA  3C1F                     move.w     D6, [A7]+
  475. 000004AC  200B                     move.l     D0, A3
  476. 000004AE  6764                     beq        +0x66 /* 00000514 */
  477. 000004B0  2F0B                     move.l     -[A7], A3
  478. 000004B2  2F3C 3D20 2020           move.l     -[A7], 0x3D202020 /* '=   ' */
  479. 000004B8  4EBA FE86                jsr        [PC - 0x17A /* 00000340 */]
  480. 000004BC  2F0B                     move.l     -[A7], A3
  481. 000004BE  2F3C 3E20 2020           move.l     -[A7], 0x3E202020 /* '>   ' */
  482. 000004C4  4EBA FE7A                jsr        [PC - 0x186 /* 00000340 */]
  483. 000004C8  2F0B                     move.l     -[A7], A3
  484. 000004CA  2F3C 3E3D 2020           move.l     -[A7], 0x3E3D2020 /* '>=  ' */
  485. 000004D0  4EBA FE6E                jsr        [PC - 0x192 /* 00000340 */]
  486. 000004D4  2F0B                     move.l     -[A7], A3
  487. 000004D6  2F3C 3C20 2020           move.l     -[A7], 0x3C202020 /* '<   ' */
  488. 000004DC  4EBA FE62                jsr        [PC - 0x19E /* 00000340 */]
  489. 000004E0  2F0B                     move.l     -[A7], A3
  490. 000004E2  2F3C 3C3D 2020           move.l     -[A7], 0x3C3D2020 /* '<=  ' */
  491. 000004E8  4EBA FE56                jsr        [PC - 0x1AA /* 00000340 */]
  492. 000004EC  2F0B                     move.l     -[A7], A3
  493. 000004EE  2F3C 6267 7774           move.l     -[A7], 0x62677774 /* 'bgwt' */
  494. 000004F4  4EBA FE4A                jsr        [PC - 0x1B6 /* 00000340 */]
  495. 000004F8  2F0B                     move.l     -[A7], A3
  496. 000004FA  2F3C 656E 6473           move.l     -[A7], 0x656E6473 /* 'ends' */
  497. 00000500  4EBA FE3E                jsr        [PC - 0x1C2 /* 00000340 */]
  498. 00000504  2F0B                     move.l     -[A7], A3
  499. 00000506  2F3C 636F 6E74           move.l     -[A7], 0x636F6E74 /* 'cont' */
  500. 0000050C  4EBA FE32                jsr        [PC - 0x1CE /* 00000340 */]
  501. 00000510  4FEF 0040                lea.l      A7, [A7 + 0x40]
  502. label00000514:
  503. 00000514  3006                     move.w     D0, D6
  504. 00000516  4CEE 1CC0 FFE0           movem.l    D6,D7,A2,A3,A4, [A6 - 0x20]
  505. 0000051C  4E5E                     unlink     A6
  506. 0000051E  4E75                     rts
  507. fn00000520:
  508. 00000520  4E56 0000                link       A6, 0
  509. 00000524  48E7 0018                movem.l    -[A7], A3,A4
  510. 00000528  4AAE 0008                tst.l      [A6 + 0x8]
  511. 0000052C  6724                     beq        +0x26 /* 00000552 */
  512. 0000052E  206E 000C                movea.l    A0, [A6 + 0xC]
  513. 00000532  2650                     movea.l    A3, [A0]
  514. 00000534  206E 0008                movea.l    A0, [A6 + 0x8]
  515. 00000538  2850                     movea.l    A4, [A0]
  516. 0000053A  296B 0014 0014           move.l     [A4 + 0x14], [A3 + 0x14]
  517. 00000540  296B 0018 0018           move.l     [A4 + 0x18], [A3 + 0x18]
  518. 00000546  296B 001C 001C           move.l     [A4 + 0x1C], [A3 + 0x1C]
  519. 0000054C  296B 0020 0020           move.l     [A4 + 0x20], [A3 + 0x20]
  520. label00000552:
  521. 00000552  4CEE 1800 FFF8           movem.l    A3,A4, [A6 - 0x8]
  522. 00000558  4E5E                     unlink     A6
  523. 0000055A  4E75                     rts
  524. fn0000055C:
  525. 0000055C  4E56 FFF8                link       A6, -0x0008
  526. 00000560  48E7 0138                movem.l    -[A7], D7,A2,A3,A4
  527. 00000564  558F                     subq.l     A7, 2
  528. 00000566  7000                     moveq.l    D0, 0x00
  529. 00000568  2F00                     move.l     -[A7], D0
  530. 0000056A  7208                     moveq.l    D1, 0x08
  531. 0000056C  3F01                     move.w     -[A7], D1
  532. 0000056E  3F01                     move.w     -[A7], D1
  533. 00000570  2F00                     move.l     -[A7], D0
  534. 00000572  7001                     moveq.l    D0, 0x01
  535. 00000574  1F00                     move.b     -[A7], D0
  536. 00000576  486E FFFC                pea.l      [A6 - 0x4]
  537. 0000057A  303C 092E                move.w     D0, 0x92E /* '\t.' */
  538. 0000057E  A816                     syscall    Pack8
  539. 00000580  3E1F                     move.w     D7, [A7]+
  540. 00000582  664A                     bne        +0x4C /* 000005CE */
  541. 00000584  2E3C 0000 0154           move.l     D7, 0x154
  542. 0000058A  603A                     bra        +0x3C /* 000005C6 */
  543. label0000058C:
  544. 0000058C  2478 02B6                movea.l    A2, [0x000002B6 /* ExpandMem */]
  545. 00000590  2672 7800                movea.l    A3, [A2 + D7]
  546. 00000594  200B                     move.l     D0, A3
  547. 00000596  6728                     beq        +0x2A /* 000005C0 */
  548. 00000598  2853                     movea.l    A4, [A3]
  549. 0000059A  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  550. 0000059E  2F14                     move.l     -[A7], [A4]
  551. 000005A0  4EBA FF7E                jsr        [PC - 0x82 /* 00000520 */]
  552. 000005A4  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  553. 000005A8  2F2C 0004                move.l     -[A7], [A4 + 0x4]
  554. 000005AC  4EBA FF72                jsr        [PC - 0x8E /* 00000520 */]
  555. 000005B0  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  556. 000005B4  2F2C 0008                move.l     -[A7], [A4 + 0x8]
  557. 000005B8  4EBA FF66                jsr        [PC - 0x9A /* 00000520 */]
  558. 000005BC  4FEF 0018                lea.l      A7, [A7 + 0x18]
  559. label000005C0:
  560. 000005C0  0687 0000 0028           addi.l     D7, 0x28 /* '(' */
  561. label000005C6:
  562. 000005C6  0C87 0000 017C           cmpi.l     D7, 0x17C
  563. 000005CC  6FBE                     ble        -0x40 /* 0000058C */
  564. label000005CE:
  565. 000005CE  558F                     subq.l     A7, 2
  566. 000005D0  486E FFFC                pea.l      [A6 - 0x4]
  567. 000005D4  7000                     moveq.l    D0, 0x00
  568. 000005D6  2F00                     move.l     -[A7], D0
  569. 000005D8  303C 042F                move.w     D0, 0x42F
  570. 000005DC  A816                     syscall    Pack8
  571. 000005DE  544F                     addq.w     A7, 2
  572. 000005E0  4CEE 1C80 FFE8           movem.l    D7,A2,A3,A4, [A6 - 0x18]
  573. 000005E6  4E5E                     unlink     A6
  574. 000005E8  4E75                     rts
  575. fn000005EA:
  576. 000005EA  4E56 FFE8                link       A6, -0x0018
  577. 000005EE  48E7 0318                movem.l    -[A7], D6,D7,A3,A4
  578. 000005F2  4247                     clr.w      D7
  579. 000005F4  7000                     moveq.l    D0, 0x00
  580. 000005F6  2840                     movea.l    A4, D0
  581. 000005F8  598F                     subq.l     A7, 4
  582. 000005FA  2F3C 6173 6861           move.l     -[A7], 0x61736861 /* 'asha' */
  583. 00000600  707B                     moveq.l    D0, 0x7B
  584. 00000602  3F00                     move.w     -[A7], D0
  585. 00000604  A81F                     syscall    Get1Resource
  586. 00000606  265F                     movea.l    A3, [A7]+
  587. 00000608  200B                     move.l     D0, A3
  588. 0000060A  6702                     beq        +0x4 /* 0000060E */
  589. 0000060C  2853                     movea.l    A4, [A3]
  590. label0000060E:
  591. 0000060E  200C                     move.l     D0, A4
  592. 00000610  6700 00A2                beq        +0xA4 /* 000006B4 */
  593. 00000614  7000                     moveq.l    D0, 0x00
  594. 00000616  2D40 FFEC                move.l     [A6 - 0x14], D0
  595. 0000061A  2D7C 6E75 6C6C FFE8      move.l     [A6 - 0x18], 0x6E756C6C /* 'null' */
  596. 00000622  2D40 FFF4                move.l     [A6 - 0xC], D0
  597. 00000626  2D7C 6E75 6C6C FFF0      move.l     [A6 - 0x10], 0x6E756C6C /* 'null' */
  598. 0000062E  2D40 FFFC                move.l     [A6 - 0x4], D0
  599. 00000632  2D7C 6E75 6C6C FFF8      move.l     [A6 - 0x8], 0x6E756C6C /* 'null' */
  600. 0000063A  7C00                     moveq.l    D6, 0x00
  601. 0000063C  558F                     subq.l     A7, 2
  602. 0000063E  2F3C 6173 6372           move.l     -[A7], 0x61736372 /* 'ascr' */
  603. 00000644  2F3C 6764 7574           move.l     -[A7], 0x67647574 /* 'gdut' */
  604. 0000064A  486E FFE8                pea.l      [A6 - 0x18]
  605. 0000064E  3F2E 000E                move.w     -[A7], [A6 + 0xE]
  606. 00000652  7000                     moveq.l    D0, 0x00
  607. 00000654  2F00                     move.l     -[A7], D0
  608. 00000656  486E FFF8                pea.l      [A6 - 0x8]
  609. 0000065A  303C 0B14                move.w     D0, 0xB14
  610. 0000065E  A816                     syscall    Pack8
  611. 00000660  3E1F                     move.w     D7, [A7]+
  612. 00000662  6650                     bne        +0x52 /* 000006B4 */
  613. 00000664  558F                     subq.l     A7, 2
  614. 00000666  486E FFF8                pea.l      [A6 - 0x8]
  615. 0000066A  486E FFF0                pea.l      [A6 - 0x10]
  616. 0000066E  303C 0405                move.w     D0, 0x405
  617. 00000672  A816                     syscall    Pack8
  618. 00000674  3E1F                     move.w     D7, [A7]+
  619. 00000676  663C                     bne        +0x3E /* 000006B4 */
  620. 00000678  558F                     subq.l     A7, 2
  621. 0000067A  486E FFF8                pea.l      [A6 - 0x8]
  622. 0000067E  486E FFF0                pea.l      [A6 - 0x10]
  623. 00000682  206E 0008                movea.l    A0, [A6 + 0x8]
  624. 00000686  2F10                     move.l     -[A7], [A0]
  625. 00000688  4E94                     jsr        [A4]
  626. 0000068A  3E1F                     move.w     D7, [A7]+
  627. 0000068C  558F                     subq.l     A7, 2
  628. 0000068E  486E FFF8                pea.l      [A6 - 0x8]
  629. 00000692  303C 0204                move.w     D0, 0x204
  630. 00000696  A816                     syscall    Pack8
  631. 00000698  0C47 F954                cmpi.w     D7, 0xF954
  632. 0000069C  544F                     addq.w     A7, 2
  633. 0000069E  6602                     bne        +0x4 /* 000006A2 */
  634. 000006A0  4247                     clr.w      D7
  635. label000006A2:
  636. 000006A2  4A47                     tst.w      D7
  637. 000006A4  660E                     bne        +0x10 /* 000006B4 */
  638. 000006A6  558F                     subq.l     A7, 2
  639. 000006A8  486E FFF0                pea.l      [A6 - 0x10]
  640. 000006AC  303C 0204                move.w     D0, 0x204
  641. 000006B0  A816                     syscall    Pack8
  642. 000006B2  544F                     addq.w     A7, 2
  643. label000006B4:
  644. 000006B4  3007                     move.w     D0, D7
  645. 000006B6  4CEE 18C0 FFD8           movem.l    D6,D7,A3,A4, [A6 - 0x28]
  646. 000006BC  4E5E                     unlink     A6
  647. 000006BE  4E75                     rts
  648. fn000006C0:
  649. 000006C0  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  650. 000006C4  6B22                     bmi        +0x24 /* 000006E8 */
  651. 000006C6  303C 0090                move.w     D0, 0x90
  652. 000006CA  A346                     syscall    GetOSTrapAddress, flags=3
  653. 000006CC  2248                     movea.l    A1, A0
  654. 000006CE  303C 009F                move.w     D0, 0x9F
  655. 000006D2  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  656. 000006D4  B3C8                     cmpa.l     A1, A0
  657. 000006D6  6710                     beq        +0x12 /* 000006E8 */
  658. 000006D8  225F                     movea.l    A1, [A7]+
  659. 000006DA  205F                     movea.l    A0, [A7]+
  660. 000006DC  301F                     move.w     D0, [A7]+
  661. 000006DE  2F09                     move.l     -[A7], A1
  662. 000006E0  A090                     syscall    SysEnvirons
  663. 000006E2  3F40 0004                move.w     [A7 + 0x4], D0
  664. 000006E6  4E75                     rts
  665. label000006E8:
  666. 000006E8  206F 0004                movea.l    A0, [A7 + 0x4]
  667. 000006EC  303C 0001                move.w     D0, 0x1
  668. 000006F0  2248                     movea.l    A1, A0
  669. 000006F2  6006                     bra        +0x8 /* 000006FA */
  670. 000006F4  0313                     btst       [A3], D1
  671. 000006F6  0B02                     btst       D2, D5
  672. 000006F8  0100                     btst       D0, D0
  673. label000006FA:
  674. 000006FA  303C 0010                move.w     D0, 0x10
  675. 000006FE  E240                     asr        D0.w, 1
  676. 00000700  5340                     subq.w     D0, 1
  677. label00000702:
  678. 00000702  4258                     clr.w      [A0]+
  679. 00000704  51C8 FFFC                dbf        D0, -0x6 /* 00000702 */
  680. 00000708  32BC 0001                move.w     [A1], 0x1
  681. 0000070C  2078 02AE                movea.l    A0, [0x000002AE /* ROMBase */]
  682. 00000710  337C FFFE 0002           move.w     [A1 + 0x2], 0xFFFE
  683. 00000716  0C28 00FF 0009           cmpi.b     [A0 + 0x9], 0xFF
  684. 0000071C  6742                     beq        +0x44 /* 00000760 */
  685. 0000071E  4A28 0008                tst.b      [A0 + 0x8]
  686. 00000722  6E20                     bgt        +0x22 /* 00000744 */
  687. 00000724  337C FFFF 0002           move.w     [A1 + 0x2], 0xFFFF
  688. 0000072A  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  689. 0000072E  6B30                     bmi        +0x32 /* 00000760 */
  690. 00000730  337C 0001 0002           move.w     [A1 + 0x2], 0x1
  691. 00000736  4A78 0B22                tst.w      [0x00000B22 /* HWCfgFlags */]
  692. 0000073A  6A24                     bpl        +0x26 /* 00000760 */
  693. 0000073C  337C 0002 0002           move.w     [A1 + 0x2], 0x2
  694. 00000742  601C                     bra        +0x1E /* 00000760 */
  695. label00000744:
  696. 00000744  4269 0002                clr.w      [A1 + 0x2]
  697. 00000748  0C28 0002 0008           cmpi.b     [A0 + 0x8], 0x2
  698. 0000074E  6E10                     bgt        +0x12 /* 00000760 */
  699. 00000750  6708                     beq        +0xA /* 0000075A */
  700. 00000752  337C 0004 0002           move.w     [A1 + 0x2], 0x4
  701. 00000758  6006                     bra        +0x8 /* 00000760 */
  702. label0000075A:
  703. 0000075A  337C 0003 0002           move.w     [A1 + 0x2], 0x3
  704. label00000760:
  705. 00000760  4269 0004                clr.w      [A1 + 0x4]
  706. 00000764  0C38 0002 012F           cmpi.b     [0x0000012F /* CPUFlag */], 0x2
  707. 0000076A  6E0A                     bgt        +0xC /* 00000776 */
  708. 0000076C  1038 012F                move.b     D0, [0x0000012F /* CPUFlag */]
  709. 00000770  5240                     addq.w     D0, 1
  710. 00000772  1340 0007                move.b     [A1 + 0x7], D0
  711. label00000776:
  712. 00000776  4A78 028E                tst.w      [0x0000028E /* ROM85 */]
  713. 0000077A  6B0E                     bmi        +0x10 /* 0000078A */
  714. 0000077C  0838 0004 0B22           btst.b     [0x00000B22 /* HWCfgFlags */], 0x4
  715. 00000782  6706                     beq        +0x8 /* 0000078A */
  716. 00000784  137C 0001 0008           move.b     [A1 + 0x8], 0x1
  717. label0000078A:
  718. 0000078A  0C78 3FFF 028E           cmpi.w     [0x0000028E /* ROM85 */], 0x3FFF
  719. 00000790  6206                     bhi        +0x8 /* 00000798 */
  720. 00000792  137C 0001 0009           move.b     [A1 + 0x9], 0x1
  721. label00000798:
  722. 00000798  1038 021E                move.b     D0, [0x0000021E /* KbdType */]
  723. 0000079C  41FA FF5B                lea.l      A0, [PC - 0xA5 /* 000006F9, value 0x303C00 '0<\0', cstring "" */]
  724. 000007A0  323C 0004                move.w     D1, 0x4
  725. label000007A4:
  726. 000007A4  B020                     cmp.b      D0, -[A0]
  727. 000007A6  57C9 FFFC                dbeq       D1, -0x6 /* 000007A4 */
  728. 000007AA  5241                     addq.w     D1, 1
  729. 000007AC  3341 000A                move.w     [A1 + 0xA], D1
  730. 000007B0  4A38 0291                tst.b      [0x00000291 /* PortBUse */]
  731. 000007B4  6B18                     bmi        +0x1A /* 000007CE */
  732. 000007B6  1238 01FB                move.b     D1, [0x000001FB /* SPConfig */]
  733. 000007BA  0201 000F                andi.b     D1, 0xF
  734. 000007BE  0C01 0001                cmpi.b     D1, 0x1
  735. 000007C2  660A                     bne        +0xC /* 000007CE */
  736. 000007C4  2078 02DC                movea.l    A0, [0x000002DC /* ABusDCE */]
  737. 000007C8  1368 0007 000D           move.b     [A1 + 0xD], [A0 + 0x7]
  738. label000007CE:
  739. 000007CE  3378 0210 000E           move.w     [A1 + 0xE], [0x00000210 /* BootDrive */]
  740. 000007D4  4A78 03F6                tst.w      [0x000003F6 /* FSFCBLen */]
  741. 000007D8  6D44                     blt        +0x46 /* 0000081E */
  742. 000007DA  4269 000E                clr.w      [A1 + 0xE]
  743. 000007DE  323C 003C                move.w     D1, 0x3C /* '<' */
  744. label000007E2:
  745. 000007E2  4267                     clr.w      -[A7]
  746. 000007E4  51C9 FFFC                dbf        D1, -0x6 /* 000007E2 */
  747. 000007E8  204F                     movea.l    A0, A7
  748. 000007EA  3178 0A58 0018           move.w     [A0 + 0x18], [0x00000A58 /* SysMap */]
  749. 000007F0  7008                     moveq.l    D0, 0x08
  750. 000007F2  A260                     syscall    FSDispatch/HFSDispatch, flags=2
  751. 000007F4  6624                     bne        +0x26 /* 0000081A */
  752. 000007F6  3168 0034 0016           move.w     [A0 + 0x16], [A0 + 0x34]
  753. 000007FC  A207                     syscall    GetVolInfo/PBHGetVInfo/HGetVInfo, flags=2
  754. 000007FE  661A                     bne        +0x1C /* 0000081A */
  755. 00000800  2168 005A 0030           move.l     [A0 + 0x30], [A0 + 0x5A]
  756. 00000806  217C 4552 494B 001C      move.l     [A0 + 0x1C], 0x4552494B /* 'ERIK' */
  757. 0000080E  7001                     moveq.l    D0, 0x01
  758. 00000810  A260                     syscall    FSDispatch/HFSDispatch, flags=2
  759. 00000812  6606                     bne        +0x8 /* 0000081A */
  760. 00000814  3368 0016 000E           move.w     [A1 + 0xE], [A0 + 0x16]
  761. label0000081A:
  762. 0000081A  4FEF 007A                lea.l      A7, [A7 + 0x7A]
  763. label0000081E:
  764. 0000081E  2049                     movea.l    A0, A1
  765. 00000820  225F                     movea.l    A1, [A7]+
  766. 00000822  5C4F                     addq.w     A7, 6
  767. 00000824  3EBC EA84                move.w     [A7], 0xEA84
  768. 00000828  4ED1                     jmp        [A1]
  769. fn0000082A:
  770. 0000082A  4E56 0000                link       A6, 0
  771. 0000082E  203C 0000 A89F           move.l     D0, 0xA89F
  772. 00000834  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  773. 00000836  2F08                     move.l     -[A7], A0
  774. 00000838  203C 0000 A0AD           move.l     D0, 0xA0AD
  775. 0000083E  A346                     syscall    GetOSTrapAddress, flags=3
  776. 00000840  B1DF                     cmpa.l     A0, [A7]+
  777. 00000842  6710                     beq        +0x12 /* 00000854 */
  778. 00000844  202E 000C                move.l     D0, [A6 + 0xC]
  779. 00000848  206E 0008                movea.l    A0, [A6 + 0x8]
  780. 0000084C  A3AD                     syscall    NewGestalt, flags=3
  781. 0000084E  3D40 0010                move.w     [A6 + 0x10], D0
  782. 00000852  6006                     bra        +0x8 /* 0000085A */
  783. label00000854:
  784. 00000854  3D7C FFFC 0010           move.w     [A6 + 0x10], 0xFFFC
  785. label0000085A:
  786. 0000085A  4E5E                     unlink     A6
  787. 0000085C  205F                     movea.l    A0, [A7]+
  788. 0000085E  508F                     addq.l     A7, 8
  789. 00000860  4ED0                     jmp        [A0]
  790. fn00000862:
  791. 00000862  4E56 0000                link       A6, 0
  792. 00000866  203C 0000 A89F           move.l     D0, 0xA89F
  793. 0000086C  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  794. 0000086E  2F08                     move.l     -[A7], A0
  795. 00000870  203C 0000 A0AD           move.l     D0, 0xA0AD
  796. 00000876  A346                     syscall    GetOSTrapAddress, flags=3
  797. 00000878  B1DF                     cmpa.l     A0, [A7]+
  798. 0000087A  670E                     beq        +0x10 /* 0000088A */
  799. 0000087C  202E 000C                move.l     D0, [A6 + 0xC]
  800. 00000880  A1AD                     syscall    Gestalt, flags=1
  801. 00000882  226E 0008                movea.l    A1, [A6 + 0x8]
  802. 00000886  2288                     move.l     [A1], A0
  803. 00000888  6026                     bra        +0x28 /* 000008B0 */
  804. label0000088A:
  805. 0000088A  41FA 0036                lea.l      A0, [PC + 0x36 /* 000008C2, value 0x76657273 'vers', cstring "vers" */]
  806. 0000088E  303C EA51                move.w     D0, 0xEA51
  807. 00000892  222E 000C                move.l     D1, [A6 + 0xC]
  808. label00000896:
  809. 00000896  B298                     cmp.l      D1, [A0]+
  810. 00000898  6706                     beq        +0x8 /* 000008A0 */
  811. 0000089A  4A98                     tst.l      [A0]+
  812. 0000089C  6712                     beq        +0x14 /* 000008B0 */
  813. 0000089E  60F6                     bra        -0x8 /* 00000896 */
  814. label000008A0:
  815. 000008A0  43FA 0020                lea.l      A1, [PC + 0x20 /* 000008C2, value 0x76657273 'vers', cstring "vers" */]
  816. 000008A4  D3D0                     add.l      A1, [A0]
  817. 000008A6  4ED1                     jmp        [A1]
  818. label000008A8:
  819. 000008A8  226E 0008                movea.l    A1, [A6 + 0x8]
  820. 000008AC  2280                     move.l     [A1], D0
  821. 000008AE  4240                     clr.w      D0
  822. label000008B0:
  823. 000008B0  3D40 0010                move.w     [A6 + 0x10], D0
  824. 000008B4  4E5E                     unlink     A6
  825. 000008B6  205F                     movea.l    A0, [A7]+
  826. 000008B8  508F                     addq.l     A7, 8
  827. 000008BA  4ED0                     jmp        [A0]
  828. label000008BC:
  829. 000008BC  303C EA52                move.w     D0, 0xEA52
  830. 000008C0  60EE                     bra        -0x10 /* 000008B0 */
  831. 000008C2  7665                     moveq.l    D3, 0x65
  832. 000008C4  7273                     moveq.l    D1, 0x73
  833. 000008C6  0000 0060                ori.b      D0, 0x60 /* '`' */
  834. 000008CA  6D61                     blt        +0x63 /* 0000092D */
  835. 000008CC  6368                     bls        +0x6A /* 00000936 */
  836. 000008CE  0000 0064                ori.b      D0, 0x64 /* 'd' */
  837. 000008D2  7379                     moveq.l    D1, 0x79
  838. 000008D4  7376                     moveq.l    D1, 0x76
  839. 000008D6  0000 0088                ori.b      D0, 0x88
  840. 000008DA  7072                     moveq.l    D0, 0x72
  841. 000008DC  6F63                     ble        +0x65 /* 00000941 */
  842. 000008DE  0000 0092                ori.b      D0, 0x92
  843. 000008E2  6670                     bne        +0x72 /* 00000954 */
  844. 000008E4  7520                     moveq.l    D2, 0x20
  845. 000008E6  0000 009E                ori.b      D0, 0x9E
  846. 000008EA  7164                     moveq.l    D0, 0x64
  847. 000008EC  2020                     move.l     D0, -[A0]
  848. 000008EE  0000 00E8                ori.b      D0, 0xE8
  849. 000008F2  6B62                     bmi        +0x64 /* 00000956 */
  850. 000008F4  6420                     bcc        +0x22 /* 00000916 */
  851. 000008F6  0000 011A                ori.b      D0, 0x1A
  852. 000008FA  6174                     bsr        +0x76 /* 00000970 */
  853. 000008FC  6C6B                     bge        +0x6D /* 00000969 */
  854. 000008FE  0000 0142                ori.b      D0, 0x42 /* 'B' */
  855. 00000902  6D6D                     blt        +0x6F /* 00000971 */
  856. 00000904  7520                     moveq.l    D2, 0x20
  857. 00000906  0000 0164                ori.b      D0, 0x64 /* 'd' */
  858. 0000090A  7261                     moveq.l    D1, 0x61
  859. 0000090C  6D20                     blt        +0x22 /* 0000092E */
  860. 0000090E  0000 0188                ori.b      D0, 0x88
  861. 00000912  6C72                     bge        +0x74 /* 00000986 */
  862. 00000914  616D                     bsr        +0x6F /* 00000983 */
  863. label00000916:
  864. 00000916  0000 0188                ori.b      D0, 0x88
  865. 0000091A  0000 0000                ori.b      D0, 0x0
  866. 0000091E  0000 0000                ori.b      D0, 0x0
  867. 00000922  7001                     moveq.l    D0, 0x01
  868. 00000924  6082                     bra        -0x7C /* 000008A8 */
  869. 00000926  2278 02AE                movea.l    A1, [0x000002AE /* ROMBase */]
  870. 0000092A  7004                     moveq.l    D0, 0x04
  871. 0000092C  0C69 0075 0008           cmpi.w     [A1 + 0x8], 0x75 /* 'u' */
  872. // begin alternate branch 0000092E-00000936
  873. label0000092E:
  874. 0000092E  0075 0008 6712 0C69      ori.w      [[A5 + D6 * 8] + 0xC69], 0x8
  875. // end alternate branch 0000092E-00000936
  876. label0000092E: // (misaligned)
  877. 00000932  6712                     beq        +0x14 /* 00000946 */
  878. 00000934  0C69 0276 0008           cmpi.w     [A1 + 0x8], 0x276
  879. // begin alternate branch 00000936-0000093C
  880. label00000936:
  881. 00000936  0276 0008 6604           andi.w     [A6 + D6.w * 8 + 0x4], 0x8
  882. // end alternate branch 00000936-0000093C
  883. label00000936: // (misaligned)
  884. 0000093A  6604                     bne        +0x6 /* 00000940 */
  885. 0000093C  5240                     addq.w     D0, 1
  886. 0000093E  6006                     bra        +0x8 /* 00000946 */
  887. label00000940:
  888. 00000940  1038 0CB3                move.b     D0, [0x00000CB3 /* MMUFluff/MachineType */]
  889. 00000944  5C80                     addq.l     D0, 6
  890. label00000946:
  891. 00000946  6000 FF60                bra        -0x9E /* 000008A8 */
  892. 0000094A  7000                     moveq.l    D0, 0x00
  893. 0000094C  3038 015A                move.w     D0, [0x0000015A /* SysVersion */]
  894. 00000950  6000 FF56                bra        -0xA8 /* 000008A8 */
  895. label00000954:
  896. 00000954  7000                     moveq.l    D0, 0x00
  897. label00000956:
  898. 00000956  1038 012F                move.b     D0, [0x0000012F /* CPUFlag */]
  899. 0000095A  5240                     addq.w     D0, 1
  900. 0000095C  6000 FF4A                bra        -0xB4 /* 000008A8 */
  901. 00000960  0C38 0004 012F           cmpi.b     [0x0000012F /* CPUFlag */], 0x4
  902. 00000966  6738                     beq        +0x3A /* 000009A0 */
  903. 00000968  0838 0004 0B22           btst.b     [0x00000B22 /* HWCfgFlags */], 0x4
  904. 0000096E  6734                     beq        +0x36 /* 000009A4 */
  905. fn00000970:
  906. 00000970  204F                     movea.l    A0, A7
  907. 00000972  F280 0000                fnop
  908. 00000976  F327                     .extension 0x327 <<F/4-5/1>> // unimplemented
  909. 00000978  3017                     move.w     D0, [A7]
  910. 0000097A  2E48                     movea.l    A7, A0
  911. 0000097C  0C40 1F18                cmpi.w     D0, 0x1F18
  912. 00000980  6716                     beq        +0x18 /* 00000998 */
  913. 00000982  0C40 3F18                cmpi.w     D0, 0x3F18
  914. label00000986:
  915. 00000986  6710                     beq        +0x12 /* 00000998 */
  916. 00000988  0C40 3F38                cmpi.w     D0, 0x3F38 /* '?8' */
  917. 0000098C  670E                     beq        +0x10 /* 0000099C */
  918. 0000098E  0C40 1F38                cmpi.w     D0, 0x1F38
  919. 00000992  6708                     beq        +0xA /* 0000099C */
  920. 00000994  7000                     moveq.l    D0, 0x00
  921. 00000996  600E                     bra        +0x10 /* 000009A6 */
  922. label00000998:
  923. 00000998  7001                     moveq.l    D0, 0x01
  924. 0000099A  600A                     bra        +0xC /* 000009A6 */
  925. label0000099C:
  926. 0000099C  7002                     moveq.l    D0, 0x02
  927. 0000099E  6006                     bra        +0x8 /* 000009A6 */
  928. label000009A0:
  929. 000009A0  7003                     moveq.l    D0, 0x03
  930. 000009A2  6002                     bra        +0x4 /* 000009A6 */
  931. label000009A4:
  932. 000009A4  7000                     moveq.l    D0, 0x00
  933. label000009A6:
  934. 000009A6  6000 FF00                bra        -0xFE /* 000008A8 */
  935. 000009AA  0C78 3FFF 028E           cmpi.w     [0x0000028E /* ROM85 */], 0x3FFF
  936. 000009B0  6E1C                     bgt        +0x1E /* 000009CE */
  937. 000009B2  303C A89F                move.w     D0, 0xA89F
  938. 000009B6  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  939. 000009B8  2408                     move.l     D2, A0
  940. 000009BA  203C 0000 AB03           move.l     D0, 0xAB03
  941. 000009C0  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  942. 000009C2  203C 0000 0100           move.l     D0, 0x100
  943. 000009C8  B488                     cmp.l      D2, A0
  944. 000009CA  6606                     bne        +0x8 /* 000009D2 */
  945. 000009CC  600A                     bra        +0xC /* 000009D8 */
  946. label000009CE:
  947. 000009CE  7000                     moveq.l    D0, 0x00
  948. 000009D0  6006                     bra        +0x8 /* 000009D8 */
  949. label000009D2:
  950. 000009D2  203C 0000 0200           move.l     D0, 0x200
  951. label000009D8:
  952. 000009D8  6000 FECE                bra        -0x130 /* 000008A8 */
  953. 000009DC  1038 021E                move.b     D0, [0x0000021E /* KbdType */]
  954. 000009E0  41FA 0016                lea.l      A0, [PC + 0x16 /* 000009F8, value 0x3130B02 */]
  955. 000009E4  2248                     movea.l    A1, A0
  956. label000009E6:
  957. 000009E6  1218                     move.b     D1, [A0]+
  958. 000009E8  6700 FED2                beq        -0x12C /* 000008BC */
  959. 000009EC  B200                     cmp.b      D1, D0
  960. 000009EE  66F6                     bne        -0x8 /* 000009E6 */
  961. 000009F0  91C9                     sub.l      A0, A1
  962. 000009F2  2008                     move.l     D0, A0
  963. 000009F4  6000 FEB2                bra        -0x14C /* 000008A8 */
  964. 000009F8  0313                     btst       [A3], D1
  965. 000009FA  0B02                     btst       D2, D5
  966. 000009FC  0106                     btst       D6, D0
  967. 000009FE  0704                     btst       D4, D3
  968. 00000A00  0508                     btst       A0, D2
  969. 00000A02  0900                     btst       D0, D4
  970. 00000A04  7000                     moveq.l    D0, 0x00
  971. 00000A06  4A38 0291                tst.b      [0x00000291 /* PortBUse */]
  972. 00000A0A  6B16                     bmi        +0x18 /* 00000A22 */
  973. 00000A0C  1238 01FB                move.b     D1, [0x000001FB /* SPConfig */]
  974. 00000A10  0201 000F                andi.b     D1, 0xF
  975. 00000A14  0C01 0001                cmpi.b     D1, 0x1
  976. 00000A18  6608                     bne        +0xA /* 00000A22 */
  977. 00000A1A  2078 02DC                movea.l    A0, [0x000002DC /* ABusDCE */]
  978. 00000A1E  1028 0007                move.b     D0, [A0 + 0x7]
  979. label00000A22:
  980. 00000A22  6000 FE84                bra        -0x17A /* 000008A8 */
  981. 00000A26  0C38 0002 012F           cmpi.b     [0x0000012F /* CPUFlag */], 0x2
  982. 00000A2C  6D16                     blt        +0x18 /* 00000A44 */
  983. 00000A2E  7000                     moveq.l    D0, 0x00
  984. 00000A30  1038 0CB1                move.b     D0, [0x00000CB1 /* MMUType */]
  985. 00000A34  0C00 0001                cmpi.b     D0, 0x1
  986. 00000A38  670C                     beq        +0xE /* 00000A46 */
  987. 00000A3A  0C00 0003                cmpi.b     D0, 0x3
  988. 00000A3E  6D04                     blt        +0x6 /* 00000A44 */
  989. 00000A40  5340                     subq.w     D0, 1
  990. 00000A42  6002                     bra        +0x4 /* 00000A46 */
  991. label00000A44:
  992. 00000A44  7000                     moveq.l    D0, 0x00
  993. label00000A46:
  994. 00000A46  6000 FE60                bra        -0x19E /* 000008A8 */
  995. 00000A4A  303C A89F                move.w     D0, 0xA89F
  996. 00000A4E  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  997. 00000A50  2408                     move.l     D2, A0
  998. 00000A52  203C 0000 A88F           move.l     D0, 0xA88F
  999. 00000A58  A746                     syscall    GetToolBoxTrapAddress/GetToolTrapAddress, flags=7
  1000. 00000A5A  2038 0108                move.l     D0, [0x00000108 /* MemTop */]
  1001. 00000A5E  B488                     cmp.l      D2, A0
  1002. 00000A60  670A                     beq        +0xC /* 00000A6C */
  1003. 00000A62  598F                     subq.l     A7, 4
  1004. 00000A64  3F3C 0016                move.w     -[A7], 0x16
  1005. 00000A68  A88F                     syscall    OSDispatch
  1006. 00000A6A  201F                     move.l     D0, [A7]+
  1007. label00000A6C:
  1008. 00000A6C  6000 FE3A                bra        -0x1C4 /* 000008A8 */
  1009. fn00000A70:
  1010. 00000A70  4E56 0000                link       A6, 0
  1011. 00000A74  48E7 1F38                movem.l    -[A7], D3,D4,D5,D6,D7,A2,A3,A4
  1012. 00000A78  0838 0006 028E           btst.b     [0x0000028E /* ROM85 */], 0x6
  1013. 00000A7E  6738                     beq        +0x3A /* 00000AB8 */
  1014. label00000A80:
  1015. 00000A80  42A7                     clr.l      -[A7]
  1016. 00000A82  2F3C 4943 4E23           move.l     -[A7], 0x49434E23 /* 'ICN#' */
  1017. 00000A88  3F2E 000A                move.w     -[A7], [A6 + 0xA]
  1018. 00000A8C  A9A0                     syscall    GetResource
  1019. 00000A8E  201F                     move.l     D0, [A7]+
  1020. 00000A90  671E                     beq        +0x20 /* 00000AB0 */
  1021. 00000A92  2F00                     move.l     -[A7], D0
  1022. 00000A94  2040                     movea.l    A0, D0
  1023. 00000A96  2050                     movea.l    A0, [A0]
  1024. 00000A98  2F08                     move.l     -[A7], A0
  1025. 00000A9A  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  1026. 00000A9E  6100 010C                bsr        +0x10E /* 00000BAC */
  1027. 00000AA2  A9A3                     syscall    ReleaseResource
  1028. label00000AA4:
  1029. 00000AA4  4CDF 1CF8                movem.l    D3,D4,D5,D6,D7,A2,A3,A4, [A7]+
  1030. 00000AA8  4E5E                     unlink     A6
  1031. 00000AAA  205F                     movea.l    A0, [A7]+
  1032. 00000AAC  588F                     addq.l     A7, 4
  1033. 00000AAE  4ED0                     jmp        [A0]
  1034. label00000AB0:
  1035. 00000AB0  3F3C 0001                move.w     -[A7], 0x1
  1036. 00000AB4  A9C8                     syscall    SysBeep
  1037. 00000AB6  60EC                     bra        -0x12 /* 00000AA4 */
  1038. label00000AB8:
  1039. 00000AB8  2078 08A4                movea.l    A0, [0x000008A4 /* MainDevice */]
  1040. 00000ABC  2050                     movea.l    A0, [A0]
  1041. 00000ABE  2068 0016                movea.l    A0, [A0 + 0x16]
  1042. 00000AC2  2050                     movea.l    A0, [A0]
  1043. 00000AC4  0C68 0004 0020           cmpi.w     [A0 + 0x20], 0x4
  1044. 00000ACA  6DB4                     blt        -0x4A /* 00000A80 */
  1045. 00000ACC  42A7                     clr.l      -[A7]
  1046. 00000ACE  3F2E 000A                move.w     -[A7], [A6 + 0xA]
  1047. 00000AD2  AA1E                     syscall    GetCIcon
  1048. 00000AD4  201F                     move.l     D0, [A7]+
  1049. 00000AD6  67A8                     beq        -0x56 /* 00000A80 */
  1050. 00000AD8  2F00                     move.l     -[A7], D0
  1051. 00000ADA  2F00                     move.l     -[A7], D0
  1052. 00000ADC  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  1053. 00000AE0  6100 014A                bsr        +0x14C /* 00000C2C */
  1054. 00000AE4  AA25                     syscall    DisposeCIcon/DisposCIcon
  1055. 00000AE6  60BC                     bra        -0x42 /* 00000AA4 */
  1056. 00000AE8  5368 6F77                subq.w     [A0 + 0x6F77], 1
  1057. 00000AEC  494E                     chk.w      D4, A6
  1058. 00000AEE  4954                     chk.w      D4, [A4]
  1059. 00000AF0  2062                     movea.l    A0, -[A2]
  1060. 00000AF2  7920                     moveq.l    D4, 0x20
  1061. 00000AF4  5061                     addq.w     -[A1], 8
  1062. 00000AF6  756C                     moveq.l    D2, 0x6C
  1063. 00000AF8  204D                     movea.l    A0, A5
  1064. 00000AFA  6572                     bcs        +0x74 /* 00000B6E */
  1065. 00000AFC  6365                     bls        +0x67 /* 00000B63 */
  1066. 00000AFE  7200                     moveq.l    D1, 0x00
  1067. 00000B00  436F 7079                chk.w      D1, [A7 + 0x7079]
  1068. 00000B04  7269                     moveq.l    D1, 0x69
  1069. 00000B06  6768                     beq        +0x6A /* 00000B70 */
  1070. 00000B08  7420                     moveq.l    D2, 0x20
  1071. 00000B0A  3139 3837 2D31           move.w     -[A0], [0x38372D31]
  1072. 00000B10  3938 3800                move.w     -[A4], [0x00003800]
  1073. 00000B14  5665                     addq.w     -[A5], 3
  1074. 00000B16  7273                     moveq.l    D1, 0x73
  1075. 00000B18  696F                     bvs        +0x71 /* 00000B89 */
  1076. 00000B1A  6E20                     bgt        +0x22 /* 00000B3C */
  1077. 00000B1C  6F66                     ble        +0x68 /* 00000B84 */
  1078. 00000B1E  2037 2F31 352F 3838      move.l     D0, [[A7 + 0x352F3838 + D2 * 8]]
  1079. fn00000B26:
  1080. 00000B26  2D78 0904 FFFC           move.l     [A6 - 0x4], [0x00000904 /* CurrentA5 */]
  1081. 00000B2C  4BEE FFF8                lea.l      A5, [A6 - 0x8]
  1082. 00000B30  21CD 0904                move.l     [0x00000904 /* CurrentA5 */], A5
  1083. 00000B34  486E FFF4                pea.l      [A6 - 0xC]
  1084. 00000B38  A86E                     syscall    InitGraf
  1085. 00000B3A  486E FEA8                pea.l      [A6 - 0x158]
  1086. // begin alternate branch 00000B3C-00000B40
  1087. label00000B3C:
  1088. 00000B3C  FEA8 A86F                .extension 0xEA8 <<F/2-3/7>> // unimplemented
  1089. // end alternate branch 00000B3C-00000B40
  1090. label00000B3C: // (misaligned)
  1091. 00000B3E  A86F                     syscall    OpenPort
  1092. 00000B40  3038 092C                move.w     D0, [0x0000092C]
  1093. 00000B44  E358                     rol        D0.w, 1
  1094. 00000B46  0A40 1021                xori.w     D0, 0x1021
  1095. 00000B4A  B078 092E                cmp.w      D0, [0x0000092E]
  1096. 00000B4E  6706                     beq        +0x8 /* 00000B56 */
  1097. 00000B50  31FC 0008 092C           move.w     [0x0000092C], 0x8
  1098. label00000B56:
  1099. 00000B56  41EE FEA8                lea.l      A0, [A6 - 0x158]
  1100. 00000B5A  3028 000C                move.w     D0, [A0 + 0xC]
  1101. 00000B5E  0440 0028                subi.w     D0, 0x28 /* '(' */
  1102. 00000B62  4840                     swap.w     D0
  1103. 00000B64  3038 092C                move.w     D0, [0x0000092C]
  1104. 00000B68  2D40 FF22                move.l     [A6 - 0xDE], D0
  1105. 00000B6C  2D40 FF26                move.l     [A6 - 0xDA], D0
  1106. // begin alternate branch 00000B6E-00000B70
  1107. label00000B6E:
  1108. 00000B6E  FF26                     .extension 0xF26 <<F/4-5/7>> // unimplemented
  1109. // end alternate branch 00000B6E-00000B70
  1110. label00000B6E: // (misaligned)
  1111. label00000B70:
  1112. 00000B70  066E 0020 FF28           addi.w     [A6 - 0xD8], 0x20 /* ' ' */
  1113. 00000B76  066E 0020 FF26           addi.w     [A6 - 0xDA], 0x20 /* ' ' */
  1114. 00000B7C  4E75                     rts
  1115. fn00000B7E:
  1116. 00000B7E  3038 092C                move.w     D0, [0x0000092C]
  1117. 00000B82  322E 0008                move.w     D1, [A6 + 0x8]
  1118. // begin alternate branch 00000B84-00000B88
  1119. label00000B84:
  1120. 00000B84  0008 6A04                ori.b      A0, 0x4
  1121. // end alternate branch 00000B84-00000B88
  1122. label00000B84: // (misaligned)
  1123. 00000B86  6A04                     bpl        +0x6 /* 00000B8C */
  1124. 00000B88  323C 0028                move.w     D1, 0x28 /* '(' */
  1125. label00000B8C:
  1126. 00000B8C  D041                     add.w      D0, D1
  1127. 00000B8E  31C0 092C                move.w     [0x0000092C], D0
  1128. 00000B92  E358                     rol        D0.w, 1
  1129. 00000B94  0A40 1021                xori.w     D0, 0x1021
  1130. 00000B98  31C0 092E                move.w     [0x0000092E], D0
  1131. 00000B9C  486E FEA8                pea.l      [A6 - 0x158]
  1132. 00000BA0  A87D                     syscall    ClosePort
  1133. 00000BA2  2A6E FFFC                movea.l    A5, [A6 - 0x4]
  1134. 00000BA6  21CD 0904                move.l     [0x00000904 /* CurrentA5 */], A5
  1135. 00000BAA  4E75                     rts
  1136. fn00000BAC:
  1137. 00000BAC  4E56 FEA8                link       A6, -0x0158
  1138. 00000BB0  48E7 1F38                movem.l    -[A7], D3,D4,D5,D6,D7,A2,A3,A4
  1139. 00000BB4  6100 FF70                bsr        -0x8E /* 00000B26 */
  1140. 00000BB8  266E 000A                movea.l    A3, [A6 + 0xA]
  1141. 00000BBC  49EE FF14                lea.l      A4, [A6 - 0xEC]
  1142. 00000BC0  288B                     move.l     [A4], A3
  1143. 00000BC2  0694 0000 0080           addi.l     [A4], 0x80
  1144. 00000BC8  397C 0004 0004           move.w     [A4 + 0x4], 0x4
  1145. 00000BCE  42AC 0006                clr.l      [A4 + 0x6]
  1146. 00000BD2  397C 0020 000A           move.w     [A4 + 0xA], 0x20 /* ' ' */
  1147. 00000BD8  397C 0020 000C           move.w     [A4 + 0xC], 0x20 /* ' ' */
  1148. 00000BDE  2F0C                     move.l     -[A7], A4
  1149. 00000BE0  45EE FEA8                lea.l      A2, [A6 - 0x158]
  1150. 00000BE4  486A 0002                pea.l      [A2 + 0x2]
  1151. 00000BE8  487A 003A                pea.l      [PC + 0x3A /* 00000C24, value 0x0, cstring "" */]
  1152. 00000BEC  486E FF22                pea.l      [A6 - 0xDE]
  1153. 00000BF0  3F3C 0003                move.w     -[A7], 0x3
  1154. 00000BF4  42A7                     clr.l      -[A7]
  1155. 00000BF6  A8EC                     syscall    CopyBits
  1156. 00000BF8  0494 0000 0080           subi.l     [A4], 0x80
  1157. 00000BFE  2F0C                     move.l     -[A7], A4
  1158. 00000C00  486A 0002                pea.l      [A2 + 0x2]
  1159. 00000C04  487A 001E                pea.l      [PC + 0x1E /* 00000C24, value 0x0, cstring "" */]
  1160. 00000C08  486E FF22                pea.l      [A6 - 0xDE]
  1161. 00000C0C  3F3C 0001                move.w     -[A7], 0x1
  1162. 00000C10  42A7                     clr.l      -[A7]
  1163. 00000C12  A8EC                     syscall    CopyBits
  1164. 00000C14  6100 FF68                bsr        -0x96 /* 00000B7E */
  1165. 00000C18  4CDF 1CF8                movem.l    D3,D4,D5,D6,D7,A2,A3,A4, [A7]+
  1166. 00000C1C  4E5E                     unlink     A6
  1167. 00000C1E  205F                     movea.l    A0, [A7]+
  1168. 00000C20  5C8F                     addq.l     A7, 6
  1169. 00000C22  4ED0                     jmp        [A0]
  1170. 00000C24  0000 0000                ori.b      D0, 0x0
  1171. 00000C28  0020 0020                ori.b      -[A0], 0x20 /* ' ' */
  1172. fn00000C2C:
  1173. 00000C2C  4E56 FEA8                link       A6, -0x0158
  1174. 00000C30  48E7 1F38                movem.l    -[A7], D3,D4,D5,D6,D7,A2,A3,A4
  1175. 00000C34  6100 FEF0                bsr        -0x10E /* 00000B26 */
  1176. 00000C38  486E FF22                pea.l      [A6 - 0xDE]
  1177. 00000C3C  2F2E 000A                move.l     -[A7], [A6 + 0xA]
  1178. 00000C40  AA1F                     syscall    PlotCIcon
  1179. 00000C42  6100 FF3A                bsr        -0xC4 /* 00000B7E */
  1180. 00000C46  4CDF 1CF8                movem.l    D3,D4,D5,D6,D7,A2,A3,A4, [A7]+
  1181. 00000C4A  4E5E                     unlink     A6
  1182. 00000C4C  205F                     movea.l    A0, [A7]+
  1183. 00000C4E  5C8F                     addq.l     A7, 6
  1184. 00000C50  4ED0                     jmp        [A0]
  1185.